home *** CD-ROM | disk | FTP | other *** search
/ Adventure Games / Adventure Games 1.iso / panic / panic.exe / panic.DXR / 00285.ls < prev    next >
Encoding:
Text File  |  1995-08-24  |  312 b   |  16 lines

  1. global gTokens
  2.  
  3. on mouseDown
  4.   set whichSprite to the clickOn
  5.   if legalButton(whichSprite) then
  6.     if programmersKey() then
  7.       if the mouseH < (the left of sprite whichSprite + 5) then
  8.         set gTokens to gTokens + 5
  9.         showTokens()
  10.       end if
  11.     else
  12.       go("Scene 1")
  13.     end if
  14.   end if
  15. end
  16.